home *** CD-ROM | disk | FTP | other *** search
/ MacHome 1999 February/March / MacHome CD (February and March 1999).iso / Edutainment / INFOHIGHWAYDEMOS / demo / GEN.DCR / 00615.ls < prev    next >
Encoding:
Text File  |  1998-12-02  |  395 b   |  23 lines
  1. on enterFrame
  2.   global ActiveHZone
  3.   set ActiveHZone to "3"
  4.   set ro to rollOver()
  5.   set thereIsRoll to 0
  6.   if (ro >= 45) and (ro <= 51) then
  7.     set thereIsRoll to 1
  8.     cursor([member "mousePointer", member "mousePointerMask"])
  9.   end if
  10.   if thereIsRoll = 0 then
  11.     cursor(-1)
  12.   end if
  13. end
  14.  
  15. on exitFrame
  16.   go(the frame)
  17. end
  18.  
  19. on mouseUp
  20.   playThisSound("hyplien2", 4)
  21.   go("OrdinateurS1")
  22. end
  23.